Skip to main content
This forum is closed to new posts and responses. Individual names altered for privacy purposes. The information contained in this website is provided for informational purposes only and should not be construed as a forum for customer support requests. Any customer support requests should be directed to the official HCL customer support channels below:

HCL Software Customer Support Portal for U.S. Federal Government clients
HCL Software Customer Support Portal

Notes/Domino 6 and 7 Forum

Notes/Domino 6 and 7 Forum


  

PreviousPrevious NextNext


~Laura Nimvelugenoden 16.Jan.04 03:17 PM a Web browser
Domino Designer All Releases All Platforms


I have a simple LS program that reads an ASCII text file and produces a number of documents to be sent e-mail to Notes users....

It ceates the documents locally in the DB (which I plan to not do when finished) and fails to send the documents! "Invalid or Nonexistant Document" is the message on: Call doc.Send(True)

Also the form is NOT getting saved in the document.... HELP!
======================
Redim Infox(20) As String

Set session = New NotesSession
Set db = session.CurrentDatabase
fileNum% = Freefile()
counter% = 0
Open "c:\lotus\notes\data\FILE.txt" For Input As fileNum%
countRec% = 0
Do While Not Eof(fileNum%)
Line Input #fileNum%, InData$
counter% = counter% + 1
If Len(InData) > 100 Then
If counter% = 1 Then
Set doc = New NotesDocument(db) Call doc.ReplaceItemValue "Form",Left$(InData,3))
Call doc.ReplaceItemValue("SendTo","Special User/Server")
Call doc.ReplaceItemValue("From","Special User/Server")
Call doc.ReplaceItemValue("ReturnReceipt","0")
Infox(counter%-1) = Mid$(InData,56,114)
Call doc.ReplaceItemValue("Detail",Mid$(InData,56,114))
Else
Infox(counter%-1) = Mid$(InData,56,114)
End If
countRec% = countRec% + 1
Elseif Left$(InData,5) = "$$$$$" Then
Call doc.ReplaceItemValue("Detail",Infox)
Call doc.save(True, False) 'WORKS!
Call doc.Send(True, "Special User/Server") 'PROBLEM
Redim Infox(20)
countRec% = 0
counter% = 0
Else
countRec% = 0
End If
Loop
Close fileNum%






Store Form and e-Mail in LS (~Laura Nimvelug... 16.Jan.04)
. . You need to set the form field (~Yentl Quetkrot... 16.Jan.04)
. . . . If he has the Form "Memo" in his te... (~Dan Elhipister... 16.Jan.04)
. . . . . . Form must be sent with the document... (~Laura Nimvelug... 17.Jan.04)
. . . . I do set the Form Field ! (~Laura Nimvelug... 17.Jan.04)
. . I tried to compile your code and ju... (~Dan Elhipister... 19.Jan.04)
. . . . My Actual Code (Minus the correct U... (~Laura Nimvelug... 19.Jan.04)
. . . . . . I still don't see how you get this ... (~Dan Elhipister... 20.Jan.04)
. . . . . . . . Read the next note please... (~Laura Nimvelug... 21.Jan.04)
. . . . . . . . Let start from the beginning - - (~Laura Nimvelug... 21.Jan.04)
. . . . . . . . . . RE: Let start from the beginning - ... (~Justin Minlute... 21.Jan.04)
. . . . . . . . . . . . computerwithform (~Laura Nimvelug... 21.Jan.04)
. . . . . . . . . . . . RE: Let start from the beginning - ... (~Naomi Deskrote... 21.Jan.04)
. . . . . . . . . . . . . . RE: Let start from the beginning - ... (~Justin Minlute... 21.Jan.04)
. . . . . . . . . . Let me ask this then, since you are... (~Dan Elhipister... 21.Jan.04)
. . Solved - Thanks Stan! (~Laura Nimvelug... 21.Jan.04)





  Document options
Print this pagePrint this page

 Search this forum

  Forum views and search
Date (threaded)
Date (flat)
With excerpt
Category
Platform
Release
Advanced search

 RSS feedsRSS
All forum posts RSS
All main topics RSS